home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Visual Basic Source Code
/
Visual Basic Source Code.iso
/
vbsource
/
virtltxt
/
about.frm
next >
Wrap
Text File
|
1994-01-22
|
3KB
|
97 lines
VERSION 2.00
Begin Form About
BorderStyle = 3 'Fixed Double
Caption = "About Virtual Text Browser"
ClientHeight = 2580
ClientLeft = 2190
ClientTop = 2340
ClientWidth = 5070
ControlBox = 0 'False
FontBold = -1 'True
FontItalic = -1 'True
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 2955
Left = 2145
LinkMode = 1 'Source
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 2580
ScaleWidth = 5070
Top = 2010
Width = 5160
Begin CommandButton Command1
Caption = "OK"
Default = -1 'True
Height = 375
Left = 2100
TabIndex = 3
Top = 1920
Width = 975
End
Begin Label Label1
AutoSize = -1 'True
Caption = "CompuServe ID: 76030,270"
Height = 195
Left = 1350
TabIndex = 4
Top = 1530
Width = 2355
End
Begin Label Label4
Alignment = 2 'Center
Caption = "Robert Risholm"
FontBold = -1 'True
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 9.75
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 255
Left = 540
TabIndex = 2
Top = 1095
Width = 4095
End
Begin Label Label3
Alignment = 2 'Center
Caption = "Version 0.9 beta"
Height = 255
Left = 1680
TabIndex = 1
Top = 720
Width = 1695
End
Begin Label Label2
Alignment = 2 'Center
Caption = "Virtual Text Browser"
FontBold = -1 'True
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 13.5
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 375
Left = 720
TabIndex = 0
Top = 240
Width = 3615
End
End
'ABOUT.FRM: VBC Version
Sub Command1_Click ()
Unload About
End Sub
Sub Form_Load ()
'Center the form
About.Left = (Screen.Width - About.Width) / 2
About.Top = (Screen.Height - About.Height) / 3
End Sub